home *** CD-ROM | disk | FTP | other *** search
/ Westlight Stock Photography - Creative Freedom / Westlight Stock Photography - Creative Freedom.iso / Place in System Folder / System 7.5.2 or higher / Finder Scripting Extension / Finder Scripting Extension.rsrc / CODE_25.txt < prev    next >
Text File  |  1993-04-16  |  15KB  |  270 lines
  1. # near model CODE resource
  2. # jump table entries: 5920-5921 (2 of them)
  3. export_740:
  4. fn00000000:
  5. 00000000  4E56 FFF8                link       A6, -0x0008
  6. 00000004  48E7 0F18                movem.l    -[A7], D4,D5,D6,D7,A3,A4
  7. 00000008  282E 0018                move.l     D4, [A6 + 0x18]
  8. 0000000C  266E 0014                movea.l    A3, [A6 + 0x14]
  9. 00000010  286E 000C                movea.l    A4, [A6 + 0xC]
  10. 00000014  422E FFFF                clr.b      [A6 - 0x1]
  11. 00000018  7E00                     moveq.l    D7, 0x00
  12. 0000001A  202E 0008                move.l     D0, [A6 + 0x8]
  13. 0000001E  0480 AD20 2020           subi.l     D0, 0xAD202020
  14. 00000024  6768                     beq        +0x6A /* 0000008E */
  15. 00000026  0480 8F00 0000           subi.l     D0, 0x8F000000
  16. 0000002C  6760                     beq        +0x62 /* 0000008E */
  17. 0000002E  0480 001D 0000           subi.l     D0, 0x1D0000
  18. 00000034  6758                     beq        +0x5A /* 0000008E */
  19. 00000036  0480 00E3 0000           subi.l     D0, 0xE30000
  20. 0000003C  6750                     beq        +0x52 /* 0000008E */
  21. 0000003E  0480 0100 0000           subi.l     D0, 0x1000000
  22. 00000044  6748                     beq        +0x4A /* 0000008E */
  23. 00000046  0480 001D 0000           subi.l     D0, 0x1D0000
  24. 0000004C  6740                     beq        +0x42 /* 0000008E */
  25. 0000004E  0480 2337 4247           subi.l     D0, 0x23374247 /* '#7BG' */
  26. 00000054  6700 01C8                beq        +0x1CA /* 0000021E */
  27. 00000058  0480 0000 0307           subi.l     D0, 0x307
  28. 0000005E  6700 01E4                beq        +0x1E6 /* 00000244 */
  29. 00000062  0480 00F3 1206           subi.l     D0, 0xF31206
  30. 00000068  6700 0116                beq        +0x118 /* 00000180 */
  31. 0000006C  0480 0107 F700           subi.l     D0, 0x107F700
  32. 00000072  6700 0168                beq        +0x16A /* 000001DC */
  33. 00000076  0480 01FE F5FF           subi.l     D0, 0x1FEF5FF
  34. 0000007C  6700 0128                beq        +0x12A /* 000001A6 */
  35. 00000080  0480 0405 04FB           subi.l     D0, 0x40504FB
  36. 00000086  6700 01E2                beq        +0x1E4 /* 0000026A */
  37. 0000008A  6000 0204                bra        +0x206 /* 00000290 */
  38. label0000008E:
  39. 0000008E  426E FFF8                clr.w      [A6 - 0x8]
  40. 00000092  B8AE 0010                cmp.l      D4, [A6 + 0x10]
  41. 00000096  6F06                     ble        +0x8 /* 0000009E */
  42. 00000098  202E 0010                move.l     D0, [A6 + 0x10]
  43. 0000009C  6002                     bra        +0x4 /* 000000A0 */
  44. label0000009E:
  45. 0000009E  2004                     move.l     D0, D4
  46. label000000A0:
  47. 000000A0  2D40 FFFA                move.l     [A6 - 0x6], D0
  48. 000000A4  4A2E 001F                tst.b      [A6 + 0x1F]
  49. 000000A8  6730                     beq        +0x32 /* 000000DA */
  50. 000000AA  7E00                     moveq.l    D7, 0x00
  51. 000000AC  6024                     bra        +0x26 /* 000000D2 */
  52. label000000AE:
  53. 000000AE  1013                     move.b     D0, [A3]
  54. 000000B0  B014                     cmp.b      D0, [A4]
  55. 000000B2  630A                     bls        +0xC /* 000000BE */
  56. 000000B4  3D7C 0001 FFF8           move.w     [A6 - 0x8], 0x1
  57. 000000BA  6000 0086                bra        +0x88 /* 00000142 */
  58. label000000BE:
  59. 000000BE  1013                     move.b     D0, [A3]
  60. 000000C0  B014                     cmp.b      D0, [A4]
  61. 000000C2  6408                     bcc        +0xA /* 000000CC */
  62. 000000C4  3D7C FFFF FFF8           move.w     [A6 - 0x8], 0xFFFF
  63. 000000CA  6076                     bra        +0x78 /* 00000142 */
  64. label000000CC:
  65. 000000CC  524B                     addq.w     A3, 1
  66. 000000CE  524C                     addq.w     A4, 1
  67. 000000D0  5287                     addq.l     D7, 1
  68. label000000D2:
  69. 000000D2  BEAE FFFA                cmp.l      D7, [A6 - 0x6]
  70. 000000D6  6DD6                     blt        -0x28 /* 000000AE */
  71. 000000D8  6068                     bra        +0x6A /* 00000142 */
  72. label000000DA:
  73. 000000DA  7E00                     moveq.l    D7, 0x00
  74. 000000DC  605E                     bra        +0x60 /* 0000013C */
  75. label000000DE:
  76. 000000DE  1A13                     move.b     D5, [A3]
  77. 000000E0  1C14                     move.b     D6, [A4]
  78. 000000E2  7000                     moveq.l    D0, 0x00
  79. 000000E4  1005                     move.b     D0, D5
  80. 000000E6  0C00 0061                cmpi.b     D0, 0x61 /* 'a' */
  81. 000000EA  6514                     bcs        +0x16 /* 00000100 */
  82. 000000EC  7000                     moveq.l    D0, 0x00
  83. 000000EE  1005                     move.b     D0, D5
  84. 000000F0  0C00 007A                cmpi.b     D0, 0x7A /* 'z' */
  85. 000000F4  620A                     bhi        +0xC /* 00000100 */
  86. 000000F6  7000                     moveq.l    D0, 0x00
  87. 000000F8  1005                     move.b     D0, D5
  88. 000000FA  907C 0020                sub.w      D0, 0x20 /* ' ' */
  89. 000000FE  1A00                     move.b     D5, D0
  90. label00000100:
  91. 00000100  7000                     moveq.l    D0, 0x00
  92. 00000102  1006                     move.b     D0, D6
  93. 00000104  0C00 0061                cmpi.b     D0, 0x61 /* 'a' */
  94. 00000108  6514                     bcs        +0x16 /* 0000011E */
  95. 0000010A  7000                     moveq.l    D0, 0x00
  96. 0000010C  1006                     move.b     D0, D6
  97. 0000010E  0C00 007A                cmpi.b     D0, 0x7A /* 'z' */
  98. 00000112  620A                     bhi        +0xC /* 0000011E */
  99. 00000114  7000                     moveq.l    D0, 0x00
  100. 00000116  1006                     move.b     D0, D6
  101. 00000118  907C 0020                sub.w      D0, 0x20 /* ' ' */
  102. 0000011C  1C00                     move.b     D6, D0
  103. label0000011E:
  104. 0000011E  BC05                     cmp.b      D6, D5
  105. 00000120  6408                     bcc        +0xA /* 0000012A */
  106. 00000122  3D7C 0001 FFF8           move.w     [A6 - 0x8], 0x1
  107. 00000128  6018                     bra        +0x1A /* 00000142 */
  108. label0000012A:
  109. 0000012A  BC05                     cmp.b      D6, D5
  110. 0000012C  6308                     bls        +0xA /* 00000136 */
  111. 0000012E  3D7C FFFF FFF8           move.w     [A6 - 0x8], 0xFFFF
  112. 00000134  600C                     bra        +0xE /* 00000142 */
  113. label00000136:
  114. 00000136  524B                     addq.w     A3, 1
  115. 00000138  524C                     addq.w     A4, 1
  116. 0000013A  5287                     addq.l     D7, 1
  117. label0000013C:
  118. 0000013C  BEAE FFFA                cmp.l      D7, [A6 - 0x6]
  119. 00000140  6D9C                     blt        -0x62 /* 000000DE */
  120. label00000142:
  121. 00000142  4A6E FFF8                tst.w      [A6 - 0x8]
  122. 00000146  6618                     bne        +0x1A /* 00000160 */
  123. 00000148  B8AE 0010                cmp.l      D4, [A6 + 0x10]
  124. 0000014C  5EC0                     sgt        D0
  125. 0000014E  4400                     neg.b      D0
  126. 00000150  B8AE 0010                cmp.l      D4, [A6 + 0x10]
  127. 00000154  5DC1                     slt        D1
  128. 00000156  4401                     neg.b      D1
  129. 00000158  9001                     sub.b      D0, D1
  130. 0000015A  4880                     ext.w      D0
  131. 0000015C  3D40 FFF8                move.w     [A6 - 0x8], D0
  132. label00000160:
  133. 00000160  302E FFF8                move.w     D0, [A6 - 0x8]
  134. 00000164  48C0                     ext.l      D0
  135. 00000166  2F00                     move.l     -[A7], D0
  136. 00000168  7000                     moveq.l    D0, 0x00
  137. 0000016A  2F00                     move.l     -[A7], D0
  138. 0000016C  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  139. 00000170  4EAD 16EA                jsr        [A5 + 0x16EA /* export_729 */]
  140. 00000174  1D40 FFFF                move.b     [A6 - 0x1], D0
  141. 00000178  4FEF 000C                lea.l      A7, [A7 + 0xC]
  142. 0000017C  6000 0116                bra        +0x118 /* 00000294 */
  143. label00000180:
  144. 00000180  7000                     moveq.l    D0, 0x00
  145. 00000182  102E 001F                move.b     D0, [A6 + 0x1F]
  146. 00000186  2F00                     move.l     -[A7], D0
  147. 00000188  2F04                     move.l     -[A7], D4
  148. 0000018A  2F0B                     move.l     -[A7], A3
  149. 0000018C  2F04                     move.l     -[A7], D4
  150. 0000018E  2F0C                     move.l     -[A7], A4
  151. 00000190  2F3C 3D20 2020           move.l     -[A7], 0x3D202020 /* '=   ' */
  152. 00000196  4EBA FE68                jsr        [PC - 0x198 /* 00000000 */]
  153. 0000019A  1D40 FFFF                move.b     [A6 - 0x1], D0
  154. 0000019E  4FEF 0018                lea.l      A7, [A7 + 0x18]
  155. 000001A2  6000 00F0                bra        +0xF2 /* 00000294 */
  156. label000001A6:
  157. 000001A6  2E2E 0010                move.l     D7, [A6 + 0x10]
  158. 000001AA  9E84                     sub.l      D7, D4
  159. 000001AC  4A87                     tst.l      D7
  160. 000001AE  6D00 00E4                blt        +0xE6 /* 00000294 */
  161. 000001B2  7000                     moveq.l    D0, 0x00
  162. 000001B4  102E 001F                move.b     D0, [A6 + 0x1F]
  163. 000001B8  2F00                     move.l     -[A7], D0
  164. 000001BA  2F04                     move.l     -[A7], D4
  165. 000001BC  2F0B                     move.l     -[A7], A3
  166. 000001BE  2F04                     move.l     -[A7], D4
  167. 000001C0  200C                     move.l     D0, A4
  168. 000001C2  D087                     add.l      D0, D7
  169. 000001C4  2F00                     move.l     -[A7], D0
  170. 000001C6  2F3C 3D20 2020           move.l     -[A7], 0x3D202020 /* '=   ' */
  171. 000001CC  4EBA FE32                jsr        [PC - 0x1CE /* 00000000 */]
  172. 000001D0  1D40 FFFF                move.b     [A6 - 0x1], D0
  173. 000001D4  4FEF 0018                lea.l      A7, [A7 + 0x18]
  174. 000001D8  6000 00BA                bra        +0xBC /* 00000294 */
  175. label000001DC:
  176. 000001DC  7E00                     moveq.l    D7, 0x00
  177. 000001DE  6032                     bra        +0x34 /* 00000212 */
  178. label000001E0:
  179. 000001E0  7000                     moveq.l    D0, 0x00
  180. 000001E2  102E 001F                move.b     D0, [A6 + 0x1F]
  181. 000001E6  2F00                     move.l     -[A7], D0
  182. 000001E8  2F04                     move.l     -[A7], D4
  183. 000001EA  2F0B                     move.l     -[A7], A3
  184. 000001EC  2F04                     move.l     -[A7], D4
  185. 000001EE  200C                     move.l     D0, A4
  186. 000001F0  D087                     add.l      D0, D7
  187. 000001F2  2F00                     move.l     -[A7], D0
  188. 000001F4  2F3C 3D20 2020           move.l     -[A7], 0x3D202020 /* '=   ' */
  189. 000001FA  4EBA FE04                jsr        [PC - 0x1FC /* 00000000 */]
  190. 000001FE  4A00                     tst.b      D0
  191. 00000200  4FEF 0018                lea.l      A7, [A7 + 0x18]
  192. 00000204  670A                     beq        +0xC /* 00000210 */
  193. 00000206  1D7C 0001 FFFF           move.b     [A6 - 0x1], 0x1
  194. 0000020C  6000 0086                bra        +0x88 /* 00000294 */
  195. label00000210:
  196. 00000210  5287                     addq.l     D7, 1
  197. label00000212:
  198. 00000212  202E 0010                move.l     D0, [A6 + 0x10]
  199. 00000216  9084                     sub.l      D0, D4
  200. 00000218  B087                     cmp.l      D0, D7
  201. 0000021A  6CC4                     bge        -0x3A /* 000001E0 */
  202. 0000021C  6076                     bra        +0x78 /* 00000294 */
  203. label0000021E:
  204. 0000021E  7000                     moveq.l    D0, 0x00
  205. 00000220  102E 001F                move.b     D0, [A6 + 0x1F]
  206. 00000224  2F00                     move.l     -[A7], D0
  207. 00000226  2F2E 0010                move.l     -[A7], [A6 + 0x10]
  208. 0000022A  2F0C                     move.l     -[A7], A4
  209. 0000022C  2F04                     move.l     -[A7], D4
  210. 0000022E  2F0B                     move.l     -[A7], A3
  211. 00000230  2F3C 6267 7774           move.l     -[A7], 0x62677774 /* 'bgwt' */
  212. 00000236  4EBA FDC8                jsr        [PC - 0x238 /* 00000000 */]
  213. 0000023A  1D40 FFFF                move.b     [A6 - 0x1], D0
  214. 0000023E  4FEF 0018                lea.l      A7, [A7 + 0x18]
  215. 00000242  6050                     bra        +0x52 /* 00000294 */
  216. label00000244:
  217. 00000244  7000                     moveq.l    D0, 0x00
  218. 00000246  102E 001F                move.b     D0, [A6 + 0x1F]
  219. 0000024A  2F00                     move.l     -[A7], D0
  220. 0000024C  2F2E 0010                move.l     -[A7], [A6 + 0x10]
  221. 00000250  2F0C                     move.l     -[A7], A4
  222. 00000252  2F04                     move.l     -[A7], D4
  223. 00000254  2F0B                     move.l     -[A7], A3
  224. 00000256  2F3C 656E 6473           move.l     -[A7], 0x656E6473 /* 'ends' */
  225. 0000025C  4EBA FDA2                jsr        [PC - 0x25E /* 00000000 */]
  226. 00000260  1D40 FFFF                move.b     [A6 - 0x1], D0
  227. 00000264  4FEF 0018                lea.l      A7, [A7 + 0x18]
  228. 00000268  602A                     bra        +0x2C /* 00000294 */
  229. label0000026A:
  230. 0000026A  7000                     moveq.l    D0, 0x00
  231. 0000026C  102E 001F                move.b     D0, [A6 + 0x1F]
  232. 00000270  2F00                     move.l     -[A7], D0
  233. 00000272  2F2E 0010                move.l     -[A7], [A6 + 0x10]
  234. 00000276  2F0C                     move.l     -[A7], A4
  235. 00000278  2F04                     move.l     -[A7], D4
  236. 0000027A  2F0B                     move.l     -[A7], A3
  237. 0000027C  2F3C 636F 6E74           move.l     -[A7], 0x636F6E74 /* 'cont' */
  238. 00000282  4EBA FD7C                jsr        [PC - 0x284 /* 00000000 */]
  239. 00000286  1D40 FFFF                move.b     [A6 - 0x1], D0
  240. 0000028A  4FEF 0018                lea.l      A7, [A7 + 0x18]
  241. 0000028E  6004                     bra        +0x6 /* 00000294 */
  242. label00000290:
  243. 00000290  422E FFFF                clr.b      [A6 - 0x1]
  244. label00000294:
  245. 00000294  102E FFFF                move.b     D0, [A6 - 0x1]
  246. 00000298  4CEE 18F0 FFE0           movem.l    D4,D5,D6,D7,A3,A4, [A6 - 0x20]
  247. 0000029E  4E5E                     unlink     A6
  248. 000002A0  4E75                     rts
  249. export_741:
  250. 000002A2  4E56 0000                link       A6, 0
  251. 000002A6  2F0C                     move.l     -[A7], A4
  252. 000002A8  286E 0008                movea.l    A4, [A6 + 0x8]
  253. 000002AC  200C                     move.l     D0, A4
  254. 000002AE  6610                     bne        +0x12 /* 000002C0 */
  255. 000002B0  7004                     moveq.l    D0, 0x04
  256. 000002B2  2F00                     move.l     -[A7], D0
  257. 000002B4  4EAD 07AA                jsr        [A5 + 0x7AA /* export_241 */]
  258. 000002B8  2840                     movea.l    A4, D0
  259. 000002BA  200C                     move.l     D0, A4
  260. 000002BC  584F                     addq.w     A7, 4
  261. 000002BE  6706                     beq        +0x8 /* 000002C6 */
  262. label000002C0:
  263. 000002C0  2054                     movea.l    A0, [A4]
  264. 000002C2  20AD FD12                move.l     [A0], [A5 - 0x2EE]
  265. label000002C6:
  266. 000002C6  200C                     move.l     D0, A4
  267. 000002C8  286E FFFC                movea.l    A4, [A6 - 0x4]
  268. 000002CC  4E5E                     unlink     A6
  269. 000002CE  4E75                     rts
  270.